home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2004 #2 / Amiga Plus CD - 2004 - No. 02.iso / AmigaPlus / Tools / Development / AmigaTalk / prelude / Link.p < prev    next >
Text File  |  2004-01-31  |  504b  |  20 lines
  1. pTempVar <- <primitive 110 3 >
  2. <primitive 112 pTempVar 1  " new: " \
  3.   #( #[ 16r20 16rA0 16r21 16r81 16r00 16rF3 16rF5] \
  4.     #( #nextLink:  )) >
  5.  
  6. <primitive 112 pTempVar 2  " nextLink: " \
  7.   #( #[ 16r21 16rF1 16r60 16rF3 16rF5] \
  8.     #(  )) >
  9.  
  10. <primitive 112 pTempVar 3  " nextLink " \
  11.   #( #[ 16r10 16rF3 16rF5] \
  12.     #(  )) >
  13.  
  14. <primitive 98 #Link \
  15.   <primitive 97 #Link #Collection #AmigaTalk:General/Link.st \
  16.    #(  #nextLink ) \
  17.    #( #new: #nextLink: #nextLink  ) \
  18.   pTempVar 2 3 > #ordinary >
  19.  
  20.